﻿Imports EVOLTA.Promocion.Bl.Bc
Imports EVOLTA.Promocion.Bl.Be

Partial Class consultarStock_consultarStock
    Inherits System.Web.UI.Page

    Private Evolta As New Eevolta

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            Dim evolta As Eevolta = CType(Session("sEVOLTA"), Eevolta)
            If Not evolta Is Nothing Then
                evolta.chkVisible = False
                Session("sEVOLTA") = evolta
            End If
        End If
    End Sub

End Class
